#! /bin/sh

# A function to find the pid of a program.
pidofproc() {
   pid=""
   # Test syntax.
   if [ $# = 0 ] ; then
      echo "Usage: pidofproc {program} {port}"
      return 1
   fi

   # Get base program name
   base=`basename $1`

   # First try PID file
   if [ -f ${PIDDIR}/$base.$2.pid ] ; then
      pid=`head -n 1 ${PIDDIR}/$base.$2.pid`
      if [ "$pid" != "" ] ; then
         echo $pid
         return 0
      fi
   fi

   # Next try "pidof"
   if [ ! -z "${PIDOF}" -a -x "${PIDOF}" ] ; then
      pid=`${PIDOF} $1`
      if [ "$pid" != "" ] ; then
         echo $pid
         return 0
      fi
   fi

   # Next try "pgrep"
   if [ ! -z "${PGREP}" -a -x "${PGREP}" ] ; then
      pid=`${PGREP} -f $base`
      if [ "$pid" != "" ] ; then
         echo $pid
         return 0
      fi
   fi

   # Finally try to extract it from ps
   pid=`${PSCMD} | grep $1 | ${AWK} '{ print $1 }' | tr '\n' ' '`
   echo $pid
   return 0
}

# A function to stop a program.
killproc() {
   RC=0
   # Test syntax.
   if [ $# = 0 ]; then
      echo "Usage: killproc {program} {port} [signal]"
      return 1
   fi

   notset=0
   # check for third arg to be kill level
   if [ "$3" != "" ] ; then
      killlevel=$3
   else
      notset=1
      killlevel="-9"
   fi

   # Get base program name
   base=`basename $1`

   # Find pid.
   pid=`pidofproc $base $2`

   # Kill it.
   if [ "$pid" != "" ] ; then
      if [ "$notset" = "1" ] ; then
         if ${PS} -p "$pid">/dev/null 2>&1; then
            # TERM first, then KILL if not dead
            kill -TERM $pid 2>/dev/null
            #sleep 0.1
            if ${PS} -p "$pid" >/dev/null 2>&1 ; then
               #sleep 0.1
               if ${PS} -p "$pid" >/dev/null 2>&1 ; then
                 #sleep 0.3
                  if ${PS} -p "$pid" >/dev/null 2>&1 ; then
                     kill -KILL $pid 2>/dev/null
                  fi
               fi
            fi
         fi
         ${PS} -p "$pid" >/dev/null 2>&1
         RC=$?
         [ $RC -eq 0 ] && failure "$base shutdown" || success "$base shutdown"
         #    RC=$((! $RC))
         # use specified level only
      else
         if ${PS} -p "$pid" >/dev/null 2>&1; then
            kill $killlevel $pid 2>/dev/null
            RC=$?
            [ $RC -eq 0 ] && success "$base $killlevel" || failure "$base $killlevel"
         fi
      fi
   else
      failure "$base shutdown"
   fi
   # Remove pid file if any.
   if [ "$notset" = "1" ]; then
      rm -f "${PIDDIR}/$base.$2.pid"
   fi
   return $RC
}

# Function that checks if the configuration is OK and the Database can be connected
checkcfg() {
   RC=0
   echo "Checking Configuration and Database connection ... "
   if [ ! -z "${DIR_USER}" -a "${DIR_USER}" != "${USER}" ]; then
      su -s /bin/sh "${DIR_USER}" -c "${SUSAN_DIRECTOR_BINARY}" ${OPTIONS} -f -t
      RC=$?
   else
      "${SUSAN_DIRECTOR_BINARY}" ${OPTIONS} -f -t
      RC=$?
   fi
   return $RC
}

status() {
   pid=""
   # Test syntax.
   if [ $# = 0 ] ; then
      echo "Usage: status {program} {port}"
      return 1
   fi

   # Get base program name
   base=`basename $1`

   # First try "pidof"
   if [ ! -z "${PIDOF}" -a -x "${PIDOF}" ] ; then
      pid=`${PIDOF} $1`
      if [ "$pid" != "" ] ; then
         echo "$base (pid $pid) is running..."
         return 0
      fi
   fi

   # Next try "pgrep"
   if [ ! -z "${PGREP}" -a -x "${PGREP}" ] ; then
      pid=`${PGREP} -f $base`
      if [ "$pid" != "" ] ; then
         echo "$base (pid $pid) is running..."
         return 0
      fi
   fi

   pid=`${PSCMD} | ${AWK} 'BEGIN { prog=ARGV[1]; ARGC=1 } \
   { if ((prog == $2) || (("(" prog ")") == $2) ||        \
      (("[" prog "]") == $2) ||                           \
      ((prog ":") == $2)) { print $1 ; exit 0 } }' $1`
   if [ "$pid" != "" ] ; then
      echo "$base (pid $pid) is running..."
      return 0
   fi

   # Next try the PID files
   if [ -f ${PIDDIR}/$base.$2.pid ] ; then
      pid=`head -n 1 ${PIDDIR}/$base.$2.pid`
      if [ "$pid" != "" ] ; then
         echo "$base dead but pid file exists"
         return 1
      fi
   fi

   # See if the subsys lock exists
   if [ -f ${SUBSYSDIR}/$base ] ; then
      echo "$base dead but subsys locked"
      return 2
   fi
   echo "$base is stopped"

   return 3
}

success() {
   return 0
}

failure() {
   rc=$?
   return $rc
}
